object DMSr: TDMSr
  OldCreateOrder = False
  Height = 570
  Width = 766
  object dsEmpresaProp: TDataSource
    DataSet = DMprinc.QueryEmpresaProp
    Left = 24
    Top = 128
  end
  object dsCidade: TDataSource
    DataSet = DMprinc.QueryCidade
    Left = 24
    Top = 24
  end
  object dsCliente: TDataSource
    DataSet = QueryCliente
    Left = 80
    Top = 128
  end
  object dsVeiculo: TDataSource
    DataSet = DMprinc.QueryVeiculo
    Left = 24
    Top = 176
  end
  object dsGrupoDesp: TDataSource
    DataSet = DMprinc.QueryGrupoDesp
    Left = 80
    Top = 72
  end
  object dsFornecedor: TDataSource
    DataSet = DMprinc.QueryFornecedor
    Left = 136
    Top = 16
  end
  object dsCondPag: TDataSource
    DataSet = DMprinc.QueryCondPag
    Left = 80
    Top = 176
  end
  object dsParametro: TDataSource
    DataSet = DMprinc.QueryParametro
    Left = 136
    Top = 128
  end
  object dsMarca: TDataSource
    DataSet = DMprinc.QueryMarca
    Left = 192
    Top = 16
  end
  object dsModelo: TDataSource
    DataSet = DMprinc.QueryModelo
    Left = 144
    Top = 72
  end
  object dsCor: TDataSource
    DataSet = DMprinc.QueryCor
    Left = 72
    Top = 24
  end
  object dsTipoVeiculo: TDataSource
    DataSet = DMprinc.QueryTipoVeiculo
    Left = 24
    Top = 72
  end
  object dsCarreta1: TDataSource
    DataSet = DMprinc.QueryCarreta1
    Left = 136
    Top = 184
  end
  object dsMotorista: TDataSource
    DataSet = DMprinc.QueryMotorista
    Left = 192
    Top = 72
  end
  object dsRastreador: TDataSource
    DataSet = DMprinc.QueryRastreador
    Left = 192
    Top = 130
  end
  object dsCarreta2: TDataSource
    DataSet = DMprinc.QueryCarreta2
    Left = 192
    Top = 184
  end
  object dsCidade2: TDataSource
    DataSet = QueryCidade
    Left = 24
    Top = 240
  end
  object dsOcorrencia: TDataSource
    DataSet = DMprinc.QueryOcorrencia
    Left = 72
    Top = 232
  end
  object dsComboio: TDataSource
    DataSet = DMprinc.QueryComboio
    Left = 152
    Top = 240
  end
  object dsComboio2: TDataSource
    DataSet = DMprinc.QueryComboio2
    Left = 200
    Top = 240
  end
  object dsGrupoRec: TDataSource
    DataSet = DMprinc.QueryGrupoRec
    Left = 248
    Top = 24
  end
  object dsParcelaReceber: TDataSource
    DataSet = DMprinc.QueryParcelaReceber
    Left = 256
    Top = 80
  end
  object dsProprietario: TDataSource
    DataSet = DMprinc.QueryCliente
    Left = 264
    Top = 144
  end
  object dsCliente2: TDataSource
    DataSet = QueryCliente2
    Left = 24
    Top = 288
  end
  object dsRastreador2: TDataSource
    DataSet = DMprinc.QueryRastreador2
    Left = 80
    Top = 288
  end
  object dsCidade3: TDataSource
    DataSet = QueryCidade
    Left = 24
    Top = 336
  end
  object QueryCidade: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'NOME'
    SQL.Strings = (
      'select * from cidade')
    Params = <>
    IndexFieldNames = 'NOME Asc'
    Left = 424
    Top = 32
    object QueryCidadeCODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
      Required = True
    end
    object QueryCidadeNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 50
    end
    object QueryCidadeUF: TStringField
      FieldName = 'UF'
      Required = True
      Size = 2
    end
    object QueryCidadeDELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
  end
  object dsItemDesp: TDataSource
    DataSet = DMprinc.QueryItemDesp
    Left = 88
    Top = 344
  end
  object dsConta: TDataSource
    DataSet = DMprinc.QueryConta
    Left = 152
    Top = 288
  end
  object QueryUsuario: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from usuario')
    Params = <>
    Left = 432
    Top = 88
    object QueryUsuarioNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 10
    end
    object QueryUsuarioSENHA: TStringField
      FieldName = 'SENHA'
      Required = True
      Size = 10
    end
    object QueryUsuarioNOMECOMPLETO: TStringField
      FieldName = 'NOMECOMPLETO'
      Size = 70
    end
    object QueryUsuarioPRIVILEGIOS: TStringField
      FieldName = 'PRIVILEGIOS'
      Size = 200
    end
    object QueryUsuarioUELIBERADAS: TStringField
      FieldName = 'UELIBERADAS'
      Size = 250
    end
    object QueryUsuarioCODLINGUA: TIntegerField
      FieldName = 'CODLINGUA'
    end
  end
  object dsUsuario: TDataSource
    DataSet = QueryUsuario
    Left = 264
    Top = 192
  end
  object dsCEP: TDataSource
    Left = 280
    Top = 248
  end
  object QueryCEP: TZQuery
    Connection = DMprinc.ZConnectionCEP
    SQL.Strings = (
      'select * from cep'
      'where cep = :pcep')
    Params = <
      item
        DataType = ftString
        Name = 'pcep'
        ParamType = ptUnknown
      end>
    Left = 440
    Top = 152
    ParamData = <
      item
        DataType = ftString
        Name = 'pcep'
        ParamType = ptUnknown
      end>
  end
  object QueryCliente2: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'NOME'
    SQL.Strings = (
      'select * from cliente')
    Params = <>
    IndexFieldNames = 'NOME Asc'
    Left = 442
    Top = 210
    object QueryCliente2CODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      Required = True
    end
    object QueryCliente2NOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 50
    end
    object QueryCliente2CNPJ: TStringField
      FieldName = 'CNPJ'
    end
    object QueryCliente2FONE: TStringField
      FieldName = 'FONE'
      Size = 12
    end
    object QueryCliente2FAX: TStringField
      FieldName = 'FAX'
      Size = 12
    end
    object QueryCliente2CELULAR: TStringField
      FieldName = 'CELULAR'
      Size = 12
    end
    object QueryCliente2ENDERECO: TStringField
      FieldName = 'ENDERECO'
      Size = 50
    end
    object QueryCliente2BAIRRO: TStringField
      FieldName = 'BAIRRO'
    end
    object QueryCliente2CEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object QueryCliente2COMPLEMENTO: TStringField
      FieldName = 'COMPLEMENTO'
      Size = 100
    end
    object QueryCliente2CODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object QueryCliente2IE: TStringField
      FieldName = 'IE'
    end
    object QueryCliente2DELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
    object QueryCliente2CODCLIENTEPRINCIPAL: TIntegerField
      FieldName = 'CODCLIENTEPRINCIPAL'
    end
    object QueryCliente2CONTATO: TStringField
      FieldName = 'CONTATO'
      Size = 50
    end
  end
  object QueryCliente: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'NOME'
    SQL.Strings = (
      'select * from cliente')
    Params = <>
    IndexFieldNames = 'NOME Asc'
    Left = 442
    Top = 266
    object IntegerField1: TIntegerField
      FieldName = 'CODCLIENTE'
      Required = True
    end
    object StringField1: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 50
    end
    object StringField2: TStringField
      FieldName = 'CNPJ'
    end
    object StringField3: TStringField
      FieldName = 'FONE'
      Size = 12
    end
    object StringField4: TStringField
      FieldName = 'FAX'
      Size = 12
    end
    object StringField5: TStringField
      FieldName = 'CELULAR'
      Size = 12
    end
    object StringField6: TStringField
      FieldName = 'ENDERECO'
      Size = 50
    end
    object StringField7: TStringField
      FieldName = 'BAIRRO'
    end
    object StringField8: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object StringField9: TStringField
      FieldName = 'COMPLEMENTO'
      Size = 100
    end
    object IntegerField2: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object StringField10: TStringField
      FieldName = 'IE'
    end
    object SmallintField1: TSmallintField
      FieldName = 'DELETADO'
    end
    object IntegerField3: TIntegerField
      FieldName = 'CODCLIENTEPRINCIPAL'
    end
    object StringField11: TStringField
      FieldName = 'CONTATO'
      Size = 50
    end
  end
  object QueryVeiculoRodando: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      
        'select distinct vei.codveiculo,cb.codcomboio,vei.placa, (cido.no' +
        'me||'#39'-'#39'||cido.uf) as origem, (cidd.nome||'#39'-'#39'||cidd.uf) as destin' +
        'o'
      
        'from veiculo vei, comboio cb, comboioVeiculo cv, cidade cido, ci' +
        'dade cidd'
      'where vei.codveiculo = cv.codveiculo'
      'and cb.codcomboio = cv.codcomboio'
      'and cb.codorigem = cido.codcidade'
      'and cb.coddestino = cidd.codcidade'
      'and ((vei.parado = 0) or (vei.parado is null))'
      'and cb.datachegada is null'
      'order by vei.placa')
    Params = <>
    Left = 456
    Top = 328
    object QueryVeiculoRodandoCODCOMBOIO: TIntegerField
      FieldName = 'CODCOMBOIO'
      Required = True
    end
    object QueryVeiculoRodandoPLACA: TStringField
      FieldName = 'PLACA'
      Size = 8
    end
    object QueryVeiculoRodandoORIGEM: TStringField
      FieldName = 'ORIGEM'
      ReadOnly = True
      Required = True
      Size = 53
    end
    object QueryVeiculoRodandoDESTINO: TStringField
      FieldName = 'DESTINO'
      ReadOnly = True
      Required = True
      Size = 53
    end
    object QueryVeiculoRodandoCODVEICULO: TIntegerField
      FieldName = 'CODVEICULO'
      Required = True
    end
  end
  object QueryVeiculoParado: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      
        'select vei.codveiculo,cb.codcomboio,vei.placa, (cido.nome||'#39'-'#39'||' +
        'cido.uf) as origem, (cidd.nome||'#39'-'#39'||cidd.uf) as destino  from v' +
        'eiculo vei, comboio cb, comboioVeiculo cv, cidade cido, cidade c' +
        'idd, veiculoparado vp'
      'where vei.codveiculo = cv.codveiculo'
      'and cb.codcomboio = cv.codcomboio'
      'and cb.codorigem = cido.codcidade'
      'and cb.coddestino = cidd.codcidade'
      'and vp.codveiculo = vei.codveiculo'
      'and vp.DATASTART is null'
      'and vp.DATASTOP is not null'
      'order by vei.placa')
    Params = <>
    Left = 456
    Top = 384
    object QueryVeiculoParadoCODCOMBOIO: TIntegerField
      FieldName = 'CODCOMBOIO'
      Required = True
    end
    object QueryVeiculoParadoPLACA: TStringField
      FieldName = 'PLACA'
      Size = 8
    end
    object QueryVeiculoParadoORIGEM: TStringField
      FieldName = 'ORIGEM'
      ReadOnly = True
      Required = True
      Size = 53
    end
    object QueryVeiculoParadoDESTINO: TStringField
      FieldName = 'DESTINO'
      ReadOnly = True
      Required = True
      Size = 53
    end
    object QueryVeiculoParadoCODVEICULO: TIntegerField
      FieldName = 'CODVEICULO'
      Required = True
    end
  end
  object dsLocal: TDataSource
    DataSet = QueryLocal
    Left = 152
    Top = 352
  end
  object dsComboio3: TDataSource
    DataSet = DMprinc.QueryComboio2
    Left = 208
    Top = 288
  end
  object dsUsuarioWeb: TDataSource
    DataSet = DMprinc.QueryUsuarioWeb
    Left = 208
    Top = 352
  end
  object QueryLocal: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from local'
      'where deletado = 0 or deletado is null;')
    Params = <>
    Left = 600
    Top = 200
    object QueryLocalCODLOCAL: TIntegerField
      FieldName = 'CODLOCAL'
      Required = True
    end
    object QueryLocalDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object QueryLocalDELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
  end
  object QueryMotorista: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'NOME'
    SQL.Strings = (
      'select * from motorista')
    Params = <>
    IndexFieldNames = 'NOME Asc'
    Left = 456
    Top = 440
    object QueryMotoristaCODMOTORISTA: TIntegerField
      FieldName = 'CODMOTORISTA'
      Required = True
    end
    object QueryMotoristaCELULAR: TStringField
      FieldName = 'CELULAR'
      Size = 12
    end
    object QueryMotoristaFONE1: TStringField
      FieldName = 'FONE1'
      Size = 12
    end
    object QueryMotoristaFONE2: TStringField
      FieldName = 'FONE2'
      Size = 12
    end
    object QueryMotoristaNOME: TStringField
      FieldName = 'NOME'
      Size = 50
    end
    object QueryMotoristaENDERECO: TStringField
      FieldName = 'ENDERECO'
      Size = 100
    end
    object QueryMotoristaVALIDADECNH: TDateField
      FieldName = 'VALIDADECNH'
    end
    object QueryMotoristaDATANASCIMENTO: TDateField
      FieldName = 'DATANASCIMENTO'
    end
    object QueryMotoristaDATAADMISSAO: TDateField
      FieldName = 'DATAADMISSAO'
    end
    object QueryMotoristaBAIRRO: TStringField
      FieldName = 'BAIRRO'
    end
    object QueryMotoristaCEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object QueryMotoristaCODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object QueryMotoristaCOMPLEMENTO: TStringField
      FieldName = 'COMPLEMENTO'
      Size = 100
    end
    object QueryMotoristaRG: TStringField
      FieldName = 'RG'
    end
    object QueryMotoristaCPF: TStringField
      FieldName = 'CPF'
    end
    object QueryMotoristaCNH: TStringField
      FieldName = 'CNH'
    end
    object QueryMotoristaOBS: TStringField
      FieldName = 'OBS'
      Size = 100
    end
    object QueryMotoristaDELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
    object QueryMotoristaDATALIBERACAO: TDateField
      FieldName = 'DATALIBERACAO'
    end
    object QueryMotoristaMOTIVOEXCLUSAO: TStringField
      FieldName = 'MOTIVOEXCLUSAO'
      Size = 100
    end
    object QueryMotoristaFREQUENCIARADIO: TStringField
      FieldName = 'FREQUENCIARADIO'
      Size = 50
    end
  end
  object dsMotorista2: TDataSource
    DataSet = QueryMotorista
    Left = 272
    Top = 312
  end
  object QueryComboioSite: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      
        'select cb.codcomboio, cli.nome from comboio cb, cliente cli wher' +
        'e cb.codcliente = cli.codcliente and cb.site = -1 order by cb.co' +
        'dcomboio')
    Params = <>
    Left = 456
    Top = 496
    object QueryComboioSiteCODCOMBOIO: TIntegerField
      FieldName = 'CODCOMBOIO'
      Required = True
    end
    object QueryComboioSiteNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 50
    end
  end
  object QueryMotorista3: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from motorista')
    Params = <>
    Left = 352
    Top = 368
    object QueryMotorista3CODMOTORISTA: TIntegerField
      FieldName = 'CODMOTORISTA'
      Required = True
    end
    object QueryMotorista3CELULAR: TStringField
      FieldName = 'CELULAR'
      Size = 12
    end
    object QueryMotorista3FONE1: TStringField
      FieldName = 'FONE1'
      Size = 12
    end
    object QueryMotorista3FONE2: TStringField
      FieldName = 'FONE2'
      Size = 12
    end
    object QueryMotorista3NOME: TStringField
      FieldName = 'NOME'
      Size = 50
    end
    object QueryMotorista3ENDERECO: TStringField
      FieldName = 'ENDERECO'
      Size = 100
    end
    object QueryMotorista3VALIDADECNH: TDateField
      FieldName = 'VALIDADECNH'
    end
    object QueryMotorista3DATANASCIMENTO: TDateField
      FieldName = 'DATANASCIMENTO'
    end
    object QueryMotorista3DATAADMISSAO: TDateField
      FieldName = 'DATAADMISSAO'
    end
    object QueryMotorista3BAIRRO: TStringField
      FieldName = 'BAIRRO'
    end
    object QueryMotorista3CEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object QueryMotorista3CODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object QueryMotorista3COMPLEMENTO: TStringField
      FieldName = 'COMPLEMENTO'
      Size = 100
    end
    object QueryMotorista3RG: TStringField
      FieldName = 'RG'
    end
    object QueryMotorista3CPF: TStringField
      FieldName = 'CPF'
    end
    object QueryMotorista3CNH: TStringField
      FieldName = 'CNH'
    end
    object QueryMotorista3OBS: TStringField
      FieldName = 'OBS'
      Size = 100
    end
    object QueryMotorista3DELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
    object QueryMotorista3DATALIBERACAO: TDateField
      FieldName = 'DATALIBERACAO'
    end
    object QueryMotorista3MOTIVOEXCLUSAO: TStringField
      FieldName = 'MOTIVOEXCLUSAO'
      Size = 100
    end
    object QueryMotorista3FREQUENCIARADIO: TStringField
      FieldName = 'FREQUENCIARADIO'
      Size = 50
    end
  end
  object dsMotorista3: TDataSource
    DataSet = QueryMotorista3
    Left = 336
    Top = 432
  end
  object QueryRastreador: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from rastreador')
    Params = <>
    Left = 360
    Top = 320
    object QueryRastreadorCODRASTREADOR: TIntegerField
      FieldName = 'CODRASTREADOR'
      Required = True
    end
    object QueryRastreadorDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object QueryRastreadorFIXO: TSmallintField
      FieldName = 'FIXO'
    end
    object QueryRastreadorNUMERO: TStringField
      FieldName = 'NUMERO'
    end
    object QueryRastreadorPROPRIO: TSmallintField
      FieldName = 'PROPRIO'
    end
    object QueryRastreadorTELEMONITORADO: TSmallintField
      FieldName = 'TELEMONITORADO'
    end
  end
  object QueryEquipamento: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select e.*, r.descricao from equipamento e, rastreador r'
      'where r.codrastreador = e.codrastreador')
    Params = <>
    Left = 512
    Top = 104
    object QueryEquipamentoCODEQUIPAMENTO: TIntegerField
      FieldName = 'CODEQUIPAMENTO'
      Required = True
    end
    object QueryEquipamentoNUMERO: TStringField
      FieldName = 'NUMERO'
      Size = 50
    end
    object QueryEquipamentoCODRASTREADOR: TIntegerField
      FieldName = 'CODRASTREADOR'
    end
    object QueryEquipamentoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
  end
  object dsEquipamento: TDataSource
    DataSet = QueryEquipamento
    Left = 272
    Top = 368
  end
  object QueryRota: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from rota')
    Params = <>
    Left = 504
    Top = 56
    object QueryRotaCODROTA: TIntegerField
      FieldName = 'CODROTA'
      Required = True
    end
    object QueryRotaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
    object QueryRotaCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
    end
  end
  object dsRota: TDataSource
    DataSet = QueryRota
    Left = 112
    Top = 504
  end
  object QueryTipoPagamento: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from tipopagamento')
    Params = <>
    Left = 592
    Top = 64
    object QueryTipoPagamentoCODTIPOPAGAMENTO: TIntegerField
      FieldName = 'CODTIPOPAGAMENTO'
      Required = True
    end
    object QueryTipoPagamentoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsTipoPagamento: TDataSource
    DataSet = QueryTipoPagamento
    Left = 664
    Top = 80
  end
  object dsCarreta3: TDataSource
    DataSet = QueryCarreta3
    Left = 24
    Top = 392
  end
  object QueryCarreta3: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select * from veiculo'
      'where cavalo = 0;')
    Params = <>
    Left = 592
    Top = 280
    object QueryCarreta3CODVEICULO: TIntegerField
      FieldName = 'CODVEICULO'
      Required = True
    end
    object QueryCarreta3PLACA: TStringField
      FieldName = 'PLACA'
      Size = 8
    end
    object QueryCarreta3RENAVAM: TStringField
      FieldName = 'RENAVAM'
      Size = 50
    end
    object QueryCarreta3CHASSI: TStringField
      FieldName = 'CHASSI'
      Size = 50
    end
    object QueryCarreta3ANOFAB: TSmallintField
      FieldName = 'ANOFAB'
    end
    object QueryCarreta3ANOMOD: TSmallintField
      FieldName = 'ANOMOD'
    end
    object QueryCarreta3CODMARCA: TIntegerField
      FieldName = 'CODMARCA'
    end
    object QueryCarreta3CODTIPOVEICULO: TIntegerField
      FieldName = 'CODTIPOVEICULO'
    end
    object QueryCarreta3CODMODELO: TIntegerField
      FieldName = 'CODMODELO'
    end
    object QueryCarreta3CODCOR: TIntegerField
      FieldName = 'CODCOR'
    end
    object QueryCarreta3CODMOTORISTA: TIntegerField
      FieldName = 'CODMOTORISTA'
    end
    object QueryCarreta3DELETADO: TSmallintField
      FieldName = 'DELETADO'
    end
    object QueryCarreta3CAVALO: TSmallintField
      FieldName = 'CAVALO'
    end
    object QueryCarreta3LIMITEPESO: TIntegerField
      FieldName = 'LIMITEPESO'
    end
    object QueryCarreta3CODCARRETA1: TIntegerField
      FieldName = 'CODCARRETA1'
    end
    object QueryCarreta3CODCARRETA2: TIntegerField
      FieldName = 'CODCARRETA2'
    end
    object QueryCarreta3CODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
    end
    object QueryCarreta3CODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object QueryCarreta3TEMPERATURA: TFloatField
      FieldName = 'TEMPERATURA'
    end
    object QueryCarreta3PARADO: TSmallintField
      FieldName = 'PARADO'
    end
    object QueryCarreta3CODUSUARIOWEB: TIntegerField
      FieldName = 'CODUSUARIOWEB'
    end
    object QueryCarreta3VALORMENSAL: TFloatField
      FieldName = 'VALORMENSAL'
    end
    object QueryCarreta3CODRASTREADOR: TIntegerField
      FieldName = 'CODRASTREADOR'
    end
    object QueryCarreta3PROPRIO: TSmallintField
      FieldName = 'PROPRIO'
    end
    object QueryCarreta3DATAINCLUSAO: TDateField
      FieldName = 'DATAINCLUSAO'
    end
    object QueryCarreta3CODCARRETA3: TIntegerField
      FieldName = 'CODCARRETA3'
    end
  end
  object dsTipoOperacao: TDataSource
    DataSet = DMprinc.QueryTipoOperacao
    Left = 104
    Top = 408
  end
  object dsLocalEntrega: TDataSource
    DataSet = QueryLocalEntrega
    Left = 304
    Top = 24
  end
  object QueryLocalEntrega: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'DESCRICAO'
    SQL.Strings = (
      'select * from localcoletaentrega')
    Params = <>
    IndexFieldNames = 'DESCRICAO Asc'
    Left = 352
    Top = 88
    object QueryLocalEntregaCODLOCALCOLETAENTREGA: TIntegerField
      FieldName = 'CODLOCALCOLETAENTREGA'
      Required = True
    end
    object QueryLocalEntregaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
  end
  object QueryMercadoria: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'DESCRICAO'
    SQL.Strings = (
      'select * from mercadoria')
    Params = <>
    IndexFieldNames = 'DESCRICAO Asc'
    Left = 608
    Top = 352
    object QueryMercadoriaCODMERCADORIA: TIntegerField
      FieldName = 'CODMERCADORIA'
      Required = True
    end
    object QueryMercadoriaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
  end
  object dsMercadoria: TDataSource
    DataSet = DMprinc.QueryMercadoria
    Left = 176
    Top = 408
  end
  object QueryTipoStatusComboio: TZQuery
    Connection = DMprinc.ZConnection1
    SQL.Strings = (
      'select 1 as codstatus, '#39'Em Analise'#39' as descricao from parametro'
      'union'
      'select 2 as codstatus, '#39'Aprovado'#39' as descricao from parametro'
      'union'
      'select 3 as codstatus, '#39'Reprovado'#39' as descricao from parametro')
    Params = <>
    Left = 352
    Top = 168
    object QueryTipoStatusComboioCODSTATUS: TIntegerField
      FieldName = 'CODSTATUS'
      ReadOnly = True
    end
    object QueryTipoStatusComboioDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ReadOnly = True
      Size = 10
    end
  end
  object dsStatusComboio: TDataSource
    DataSet = QueryTipoStatusComboio
    Left = 344
    Top = 216
  end
  object QueryCargo: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'DESCRICAO'
    SQL.Strings = (
      'select * from cargo')
    Params = <>
    IndexFieldNames = 'DESCRICAO Asc'
    Left = 608
    Top = 144
    object QueryCargoCODCARGO: TIntegerField
      FieldName = 'CODCARGO'
      Required = True
    end
    object QueryCargoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsCargo: TDataSource
    DataSet = QueryCargo
    Left = 592
    Top = 144
  end
  object QueryFuncionario: TZQuery
    Connection = DMprinc.ZConnection1
    SortedFields = 'NOME'
    SQL.Strings = (
      'select * from funcionario')
    Params = <>
    IndexFieldNames = 'NOME Asc'
    Left = 616
    Top = 416
    object QueryFuncionarioCODFUNCIONARIO: TIntegerField
      FieldName = 'CODFUNCIONARIO'
      Required = True
    end
    object QueryFuncionarioNOME: TStringField
      FieldName = 'NOME'
    end
    object QueryFuncionarioRG: TStringField
      FieldName = 'RG'
    end
    object QueryFuncionarioCPF: TStringField
      FieldName = 'CPF'
    end
    object QueryFuncionarioCOMISSAO: TIntegerField
      FieldName = 'COMISSAO'
    end
    object QueryFuncionarioENDERECO: TStringField
      FieldName = 'ENDERECO'
    end
    object QueryFuncionarioCELULAR: TStringField
      FieldName = 'CELULAR'
    end
    object QueryFuncionarioFONE: TStringField
      FieldName = 'FONE'
    end
    object QueryFuncionarioDATANASCIMENTO: TDateField
      FieldName = 'DATANASCIMENTO'
    end
    object QueryFuncionarioDATAADMISSAO: TDateField
      FieldName = 'DATAADMISSAO'
    end
    object QueryFuncionarioDATADEMISSAO: TDateField
      FieldName = 'DATADEMISSAO'
    end
    object QueryFuncionarioOBSDESLIGAMENTO: TBlobField
      FieldName = 'OBSDESLIGAMENTO'
    end
    object QueryFuncionarioCARTEIRATRABALHO: TStringField
      FieldName = 'CARTEIRATRABALHO'
    end
    object QueryFuncionarioPIS: TStringField
      FieldName = 'PIS'
    end
    object QueryFuncionarioCATEGORIACNH: TStringField
      FieldName = 'CATEGORIACNH'
      Size = 2
    end
    object QueryFuncionarioDATAREGISTRO: TDateField
      FieldName = 'DATAREGISTRO'
    end
    object QueryFuncionarioDELETADO: TIntegerField
      FieldName = 'DELETADO'
    end
    object QueryFuncionarioSALARIOBASE: TIntegerField
      FieldName = 'SALARIOBASE'
    end
    object QueryFuncionarioTITULOELEITOR: TStringField
      FieldName = 'TITULOELEITOR'
    end
    object QueryFuncionarioAGENCIA: TStringField
      FieldName = 'AGENCIA'
    end
    object QueryFuncionarioCONTA: TStringField
      FieldName = 'CONTA'
    end
    object QueryFuncionarioTITULAR: TStringField
      FieldName = 'TITULAR'
    end
    object QueryFuncionarioBANCO: TStringField
      FieldName = 'BANCO'
    end
    object QueryFuncionarioAPELIDO: TStringField
      FieldName = 'APELIDO'
    end
    object QueryFuncionarioFIMEXPERIENCIA: TDateField
      FieldName = 'FIMEXPERIENCIA'
    end
    object QueryFuncionarioULTIMAFERIAS: TDateField
      FieldName = 'ULTIMAFERIAS'
    end
    object QueryFuncionarioNOMEPAI: TStringField
      FieldName = 'NOMEPAI'
    end
    object QueryFuncionarioNOMEMAE: TStringField
      FieldName = 'NOMEMAE'
      Size = 18
    end
    object QueryFuncionarioTAMCALCA: TStringField
      FieldName = 'TAMCALCA'
    end
    object QueryFuncionarioTAMCAMISA: TStringField
      FieldName = 'TAMCAMISA'
    end
    object QueryFuncionarioTAMSAPATO: TStringField
      FieldName = 'TAMSAPATO'
    end
    object QueryFuncionarioCODCARGO: TIntegerField
      FieldName = 'CODCARGO'
    end
    object QueryFuncionarioCODCIDADE: TIntegerField
      FieldName = 'CODCIDADE'
    end
    object QueryFuncionarioTAMCAMISETA: TStringField
      FieldName = 'TAMCAMISETA'
    end
    object QueryFuncionarioOBS: TStringField
      FieldName = 'OBS'
      Size = 18
    end
  end
  object dsFuncionario: TDataSource
    DataSet = QueryFuncionario
    Left = 608
    Top = 416
  end
  object QueryComboio: TZQuery
    SortedFields = 'CODCOMBOIO'
    SQL.Strings = (
      'select * from comboio')
    Params = <>
    IndexFieldNames = 'CODCOMBOIO Asc'
    Left = 704
    Top = 136
    object QueryComboioCODCOMBOIO: TIntegerField
      FieldName = 'CODCOMBOIO'
      Required = True
    end
    object QueryComboioKMPREVISTO: TIntegerField
      FieldName = 'KMPREVISTO'
    end
    object QueryComboioCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
    end
    object QueryComboioCODRASTREADOR: TIntegerField
      FieldName = 'CODRASTREADOR'
    end
    object QueryComboioDATA: TDateTimeField
      FieldName = 'DATA'
      EditMask = '99/99/9999 99:99:99;1'
    end
    object QueryComboioPREVISAOSAIDA: TDateTimeField
      FieldName = 'PREVISAOSAIDA'
      EditMask = '99/99/9999 99:99:99;1'
    end
    object QueryComboioCODDESTINO: TIntegerField
      FieldName = 'CODDESTINO'
    end
    object QueryComboioCODFATURA: TIntegerField
      FieldName = 'CODFATURA'
    end
    object QueryComboioCODORIGEM: TIntegerField
      FieldName = 'CODORIGEM'
    end
    object QueryComboioVALOR: TFloatField
      FieldName = 'VALOR'
      currency = True
    end
    object QueryComboioVALORKM: TFloatField
      FieldName = 'VALORKM'
    end
    object QueryComboioPREVISAOCHEGADA: TDateTimeField
      FieldName = 'PREVISAOCHEGADA'
      EditMask = '99/99/9999 99:99:99;1'
    end
    object QueryComboioDATACHEGADA: TDateTimeField
      FieldName = 'DATACHEGADA'
      EditMask = '99/99/9999 99:99:99;1'
    end
    object QueryComboioEXPORTADO: TSmallintField
      FieldName = 'EXPORTADO'
    end
    object QueryComboioCOMBOIOCLIENTE: TStringField
      FieldName = 'COMBOIOCLIENTE'
    end
    object QueryComboioUSUARIODIG: TStringField
      FieldName = 'USUARIODIG'
    end
    object SmallintField2: TSmallintField
      FieldName = 'SITE'
    end
    object QueryComboioESPECIAL: TSmallintField
      FieldName = 'ESPECIAL'
    end
    object QueryComboioCODROTA: TIntegerField
      FieldName = 'CODROTA'
    end
    object QueryComboioCODTIPOOPERACAO: TIntegerField
      FieldName = 'CODTIPOOPERACAO'
    end
    object QueryComboioCODLOCALENTREGA: TIntegerField
      FieldName = 'CODLOCALENTREGA'
    end
    object QueryComboioCODLOCALCOLETA: TIntegerField
      FieldName = 'CODLOCALCOLETA'
    end
    object QueryComboioSTATUS: TSmallintField
      FieldName = 'STATUS'
    end
    object QueryComboioHORA: TTimeField
      FieldName = 'HORA'
      EditMask = '!99:99;1;_'
    end
  end
end
